    Event AnEvent(ByVal EventNumber As Integer)